home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Apple Demos / Tutorials / Display Card 4•8⁄8•24 Training / Display Card 4•8_8•24 Training / card_85366.txt < prev    next >
Text File  |  1990-03-19  |  11KB  |  603 lines
  1. -- card: 85366 from stack: in
  2. -- bmap block id: 77743
  3. -- flags: 0000
  4. -- background id: 4016
  5. -- name: Map
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   global clickTime
  9.   if the ticks - clickTime < 50 then exit mouseUp
  10.  
  11.   answer "Click one of the sections on the Stack Map." with "Help" or "OK"
  12.   if it is "Help" then
  13.     push card
  14.     visual dissolve
  15.     go card "howtoUse"
  16.   else exit mouseUp
  17. end mouseUp
  18.  
  19. on closecard
  20.   push card
  21. end closecard
  22.  
  23.  
  24.  
  25. -- part 15 (button)
  26. -- low flags: 00
  27. -- high flags: 8000
  28. -- rect: left=126 top=94 right=131 bottom=166
  29. -- title width / last selected line: 0
  30. -- icon id / first selected line: 0 / 0
  31. -- text alignment: 1
  32. -- font id: 0
  33. -- text size: 12
  34. -- style flags: 0
  35. -- line height: 16
  36. -- part name: 
  37. ----- HyperTalk script -----
  38. on mouseUp
  39.   push card
  40.  
  41.   repeat 2
  42.     set hilite of bkgnd button 1 to true
  43.     wait 3
  44.     set hilite of bkgnd button 1 to false
  45.     wait 3
  46.   end repeat
  47.  
  48.   visual dissolve
  49.   go card "open 0"
  50. end mouseUp
  51.  
  52.  
  53.  
  54. -- part 18 (button)
  55. -- low flags: 00
  56. -- high flags: 8000
  57. -- rect: left=125 top=153 right=196 bottom=178
  58. -- title width / last selected line: 0
  59. -- icon id / first selected line: 0 / 0
  60. -- text alignment: 1
  61. -- font id: 0
  62. -- text size: 12
  63. -- style flags: 0
  64. -- line height: 16
  65. -- part name: 
  66. ----- HyperTalk script -----
  67. on mouseUp
  68.   push card
  69.  
  70.   repeat 2
  71.     set hilite of bkgnd button 2 to true
  72.     wait 3
  73.     set hilite of bkgnd button 2 to false
  74.     wait 3
  75.   end repeat
  76.  
  77.   visual dissolve
  78.   go card "howtoUse"
  79. end mouseUp
  80.  
  81.  
  82.  
  83. -- part 35 (button)
  84. -- low flags: 00
  85. -- high flags: 2000
  86. -- rect: left=285 top=95 right=143 bottom=343
  87. -- title width / last selected line: 0
  88. -- icon id / first selected line: 0 / 0
  89. -- text alignment: 1
  90. -- font id: 0
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: 
  95. ----- HyperTalk script -----
  96. on mouseUp
  97.   push card
  98.  
  99.   repeat 2
  100.     set hilite of bkgnd button 3 to true
  101.     wait 3
  102.     set hilite of bkgnd button 3 to false
  103.     wait 3
  104.   end repeat
  105.  
  106.   visual dissolve
  107.   go card "intro 0"
  108. end mouseUp
  109.  
  110.  
  111.  
  112. -- part 40 (button)
  113. -- low flags: 00
  114. -- high flags: 2000
  115. -- rect: left=356 top=95 right=143 bottom=413
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: 
  124. ----- HyperTalk script -----
  125. on mouseUp
  126.   push card
  127.  
  128.   repeat 2
  129.     set hilite of bkgnd button id 19 to true
  130.     wait 3
  131.     set hilite of bkgnd button id 19 to false
  132.     wait 3
  133.   end repeat
  134.  
  135.   visual dissolve
  136.   go card "f&b 0"
  137. end mouseUp
  138.  
  139.  
  140.  
  141. -- part 63 (button)
  142. -- low flags: 00
  143. -- high flags: 2000
  144. -- rect: left=430 top=94 right=143 bottom=496
  145. -- title width / last selected line: 0
  146. -- icon id / first selected line: 0 / 0
  147. -- text alignment: 1
  148. -- font id: 0
  149. -- text size: 12
  150. -- style flags: 0
  151. -- line height: 16
  152. -- part name: 
  153. ----- HyperTalk script -----
  154. on mouseUp
  155.   push card
  156.  
  157.   repeat 2
  158.     set hilite of bkgnd button id 20 to true
  159.     wait 3
  160.     set hilite of bkgnd button id 20 to false
  161.     wait 3
  162.   end repeat
  163.  
  164.   visual dissolve
  165.   go card "market 0"
  166. end mouseUp
  167.  
  168.  
  169.  
  170. -- part 14 (button)
  171. -- low flags: 00
  172. -- high flags: 2000
  173. -- rect: left=284 top=150 right=191 bottom=343
  174. -- title width / last selected line: 0
  175. -- icon id / first selected line: 0 / 0
  176. -- text alignment: 1
  177. -- font id: 0
  178. -- text size: 12
  179. -- style flags: 0
  180. -- line height: 16
  181. -- part name: 
  182. ----- HyperTalk script -----
  183. on mouseUp
  184.   push card
  185.  
  186.   repeat 2
  187.     set hilite of bkgnd button 6 to true
  188.     wait 3
  189.     set hilite of bkgnd button 6 to false
  190.     wait 3
  191.   end repeat
  192.  
  193.   visual dissolve
  194.   go card "technology 0"
  195. end mouseUp
  196.  
  197.  
  198.  
  199. -- part 20 (button)
  200. -- low flags: 00
  201. -- high flags: 2000
  202. -- rect: left=357 top=151 right=199 bottom=413
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 0 / 0
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: 
  211. ----- HyperTalk script -----
  212. on mouseUp
  213.   push card
  214.  
  215.   repeat 2
  216.     set hilite of bkgnd button id 22 to true
  217.     wait 3
  218.     set hilite of bkgnd button id 22 to false
  219.     wait 3
  220.   end repeat
  221.  
  222.   visual dissolve
  223.   go card "service 0"
  224. end mouseUp
  225.  
  226.  
  227.  
  228. -- part 64 (button)
  229. -- low flags: 00
  230. -- high flags: 2000
  231. -- rect: left=431 top=151 right=202 bottom=488
  232. -- title width / last selected line: 0
  233. -- icon id / first selected line: 0 / 0
  234. -- text alignment: 1
  235. -- font id: 0
  236. -- text size: 12
  237. -- style flags: 0
  238. -- line height: 16
  239. -- part name: 
  240. ----- HyperTalk script -----
  241. on mouseUp
  242.   push card
  243.  
  244.   repeat 2
  245.     set hilite of bkgnd button id 23 to true
  246.     wait 3
  247.     set hilite of bkgnd button id 23 to false
  248.     wait 3
  249.   end repeat
  250.  
  251.   visual dissolve
  252.   go card "compete0"
  253. end mouseUp
  254.  
  255.  
  256.  
  257. -- part 66 (button)
  258. -- low flags: 00
  259. -- high flags: 2000
  260. -- rect: left=283 top=258 right=301 bottom=334
  261. -- title width / last selected line: 0
  262. -- icon id / first selected line: 0 / 0
  263. -- text alignment: 1
  264. -- font id: 0
  265. -- text size: 12
  266. -- style flags: 0
  267. -- line height: 16
  268. -- part name: 
  269. ----- HyperTalk script -----
  270. on mouseUp
  271.   push card
  272.  
  273.   repeat 2
  274.     set hilite of bkgnd button id 24 to true
  275.     wait 3
  276.     set hilite of bkgnd button id 24 to false
  277.     wait 3
  278.   end repeat
  279.  
  280.   visual dissolve
  281.   go card "glossary 0"
  282. end mouseUp
  283.  
  284.  
  285.  
  286. -- part 67 (button)
  287. -- low flags: 00
  288. -- high flags: 2000
  289. -- rect: left=357 top=206 right=257 bottom=413
  290. -- title width / last selected line: 0
  291. -- icon id / first selected line: 0 / 0
  292. -- text alignment: 1
  293. -- font id: 0
  294. -- text size: 12
  295. -- style flags: 0
  296. -- line height: 16
  297. -- part name: 
  298. ----- HyperTalk script -----
  299. on mouseUp
  300.   push card
  301.  
  302.   repeat 2
  303.     set hilite of bkgnd button id 53 to true
  304.     wait 3
  305.     set hilite of bkgnd button id 53 to false
  306.     wait 3
  307.   end repeat
  308.  
  309.   visual dissolve
  310.   go card "test 0"
  311. end mouseUp
  312.  
  313.  
  314.  
  315. -- part 16 (button)
  316. -- low flags: 00
  317. -- high flags: 2000
  318. -- rect: left=357 top=260 right=303 bottom=401
  319. -- title width / last selected line: 0
  320. -- icon id / first selected line: 0 / 0
  321. -- text alignment: 1
  322. -- font id: 0
  323. -- text size: 12
  324. -- style flags: 0
  325. -- line height: 16
  326. -- part name: 
  327. ----- HyperTalk script -----
  328. on mouseUp
  329.   push card
  330.  
  331.   repeat 2
  332.     set hilite of bkgnd button 11 to true
  333.     wait 3
  334.     set hilite of bkgnd button 11 to false
  335.     wait 3
  336.   end repeat
  337.  
  338.   visual dissolve
  339.   go card "index 1"
  340. end mouseUp
  341.  
  342.  
  343.  
  344. -- part 21 (button)
  345. -- low flags: 00
  346. -- high flags: 2000
  347. -- rect: left=186 top=189 right=242 bottom=257
  348. -- title width / last selected line: 0
  349. -- icon id / first selected line: 0 / 0
  350. -- text alignment: 1
  351. -- font id: 0
  352. -- text size: 12
  353. -- style flags: 0
  354. -- line height: 16
  355. -- part name: 
  356. ----- HyperTalk script -----
  357. on mouseUp
  358.   push card
  359.  
  360.   repeat 2
  361.     set hilite of bkgnd button 12 to true
  362.     wait 3
  363.     set hilite of bkgnd button 12 to false
  364.     wait 3
  365.   end repeat
  366.  
  367.   visual dissolve
  368.   go card "content 0"
  369. end mouseUp
  370.  
  371.  
  372.  
  373. -- part 25 (button)
  374. -- low flags: 00
  375. -- high flags: 8000
  376. -- rect: left=206 top=97 right=137 bottom=256
  377. -- title width / last selected line: 0
  378. -- icon id / first selected line: 0 / 0
  379. -- text alignment: 1
  380. -- font id: 0
  381. -- text size: 12
  382. -- style flags: 0
  383. -- line height: 16
  384. -- part name: 
  385. ----- HyperTalk script -----
  386. on mouseUp
  387.   answer "You are already here. Try another section." with "Help" or "OK"
  388.   if it is "Help" then
  389.     push card
  390.     visual dissolve
  391.     go card "howtoUse"
  392.   else exit mouseUp
  393. end mouseUp
  394.  
  395.  
  396.  
  397. -- part 37 (button)
  398. -- low flags: 00
  399. -- high flags: 2000
  400. -- rect: left=401 top=317 right=342 bottom=429
  401. -- title width / last selected line: 0
  402. -- icon id / first selected line: 18614 / 18614
  403. -- text alignment: 1
  404. -- font id: 0
  405. -- text size: 12
  406. -- style flags: 0
  407. -- line height: 16
  408. -- part name: home
  409. ----- HyperTalk script -----
  410. on mouseUp
  411.   visual dissolve to white
  412.   visual dissolve
  413.   domenu  home
  414. end mouseUp
  415.  
  416.  
  417.  
  418. -- part 48 (button)
  419. -- low flags: 00
  420. -- high flags: 0000
  421. -- rect: left=457 top=317 right=342 bottom=485
  422. -- title width / last selected line: 0
  423. -- icon id / first selected line: 18622 / 18622
  424. -- text alignment: 1
  425. -- font id: 0
  426. -- text size: 12
  427. -- style flags: 0
  428. -- line height: 16
  429. -- part name: next
  430. ----- HyperTalk script -----
  431. on mouseUp
  432.   answer "Click one of the sections." with "Help" or "OK"
  433.   if it is "Help" then
  434.     push card
  435.     visual dissolve
  436.     go card "howtoUse"
  437.   else exit mouseUp
  438. end mouseUp
  439.  
  440.  
  441.  
  442. -- part 57 (button)
  443. -- low flags: 00
  444. -- high flags: 2000
  445. -- rect: left=484 top=317 right=342 bottom=512
  446. -- title width / last selected line: 0
  447. -- icon id / first selected line: 18613 / 18613
  448. -- text alignment: 1
  449. -- font id: 0
  450. -- text size: 12
  451. -- style flags: 0
  452. -- line height: 16
  453. -- part name: return
  454. ----- HyperTalk script -----
  455. on mouseUp
  456.   global lastPush
  457.   pop card into lastPush
  458.   if the short name of this stack is not in lastPush then
  459.     visual dissolve
  460.     go card "Map"
  461.   else
  462.     visual dissolve
  463.     go lastPush
  464.   end if
  465. end mouseUp
  466.  
  467.  
  468.  
  469. -- part 69 (button)
  470. -- low flags: 00
  471. -- high flags: 2000
  472. -- rect: left=428 top=317 right=342 bottom=456
  473. -- title width / last selected line: 0
  474. -- icon id / first selected line: 18611 / 18611
  475. -- text alignment: 1
  476. -- font id: 0
  477. -- text size: 12
  478. -- style flags: 0
  479. -- line height: 16
  480. -- part name: prev
  481. ----- HyperTalk script -----
  482. on mouseUp
  483.   visual effect scroll right
  484.   go prev
  485. end mouseUp
  486.  
  487.  
  488.  
  489. -- part 71 (button)
  490. -- low flags: 00
  491. -- high flags: A000
  492. -- rect: left=449 top=3 right=18 bottom=510
  493. -- title width / last selected line: 0
  494. -- icon id / first selected line: 0 / 0
  495. -- text alignment: 0
  496. -- font id: 3
  497. -- text size: 10
  498. -- style flags: 2048
  499. -- line height: 13
  500. -- part name: Contents
  501. ----- HyperTalk script -----
  502. on mouseUp
  503.   visual effect dissolve
  504.   go card "content 0"
  505. end mouseUp
  506.  
  507.  
  508.  
  509. -- part 73 (button)
  510. -- low flags: 00
  511. -- high flags: 0000
  512. -- rect: left=284 top=204 right=255 bottom=339
  513. -- title width / last selected line: 0
  514. -- icon id / first selected line: 0 / 0
  515. -- text alignment: 1
  516. -- font id: 0
  517. -- text size: 12
  518. -- style flags: 0
  519. -- line height: 16
  520. -- part name: New Button
  521. ----- HyperTalk script -----
  522. on mouseUp
  523.   push card
  524.  
  525.   repeat 2
  526.     set hilite of bkgnd button 14 to true
  527.     wait 3
  528.     set hilite of bkgnd button 14 to false
  529.     wait 3
  530.   end repeat
  531.  
  532.   visual dissolve
  533.   go cd "question 0"
  534. end mouseUp
  535.  
  536.  
  537.  
  538. -- part 75 (button)
  539. -- low flags: 00
  540. -- high flags: 8000
  541. -- rect: left=0 top=320 right=342 bottom=100
  542. -- title width / last selected line: 0
  543. -- icon id / first selected line: 0 / 0
  544. -- text alignment: 1
  545. -- font id: 0
  546. -- text size: 12
  547. -- style flags: 0
  548. -- line height: 16
  549. -- part name: Exit
  550. ----- HyperTalk script -----
  551. on mouseUp
  552.   global camefrom,whatcard
  553.   if camefrom = "CD Directory" then go whatcard
  554.   else domenu quit HyperCard
  555. end mouseUp
  556.  
  557.  
  558.  
  559. -- part contents for background part 3
  560. ----- text -----
  561. Stack Map
  562.  
  563. -- part contents for background part 7
  564. ----- text -----
  565. Click any location in the map to go there.
  566.  
  567.  
  568.  
  569.  
  570.  
  571.  
  572.  
  573.  
  574.  
  575.  
  576.  
  577.  
  578. -- part contents for background part 47
  579. ----- text -----
  580. Macintosh Display Card 4‚Ä¢8 and 8‚Ä¢24
  581.  
  582. -- part contents for background part 49
  583. ----- text -----
  584. Stack Map
  585. Help
  586. (-
  587. Product Description
  588. Features & Benefits
  589. Market & Competition
  590. Technology
  591. Service & Support
  592. Customer Questions
  593. Evaluation
  594. Glossary
  595. (-
  596. Stack Contents
  597. Index
  598. (-
  599. Print Card/P
  600.  
  601. -- part contents for background part 52
  602. ----- text -----
  603. Map